home *** CD-ROM | disk | FTP | other *** search
/ Chip 2011 November / CHIP_2011_11.iso / Programy / Inne / Gry / Carnage_Contest / scripts / CC Original / movement / Raft.lua < prev    next >
Encoding:
Text File  |  2009-09-28  |  1.7 KB  |  58 lines
  1. --------------------------------------------------------------------------------
  2. -- Weapon Raft
  3. -- Original Carnage Contest Weapon
  4. -- Script by DC, September 2009, www.UnrealSoftware.de
  5. --------------------------------------------------------------------------------
  6.  
  7. -- Setup Tables
  8. if cc==nil then cc={} end
  9. cc.raft={}
  10.  
  11. -- Load & Prepare Ressources
  12. cc.raft.gfx_wpn=loadgfx("weapons/raft.bmp")                            -- Weapon Image
  13. setmidhandle(cc.raft.gfx_wpn)
  14.  
  15. --------------------------------------------------------------------------------
  16. -- Weapon: raft
  17. --------------------------------------------------------------------------------
  18.  
  19. cc.raft.id=addweapon("cc.raft","Raft",cc.raft.gfx_wpn,1)            -- Add Weapon (1 use)
  20.  
  21. function cc.raft.draw()                                                -- Draw
  22.     if (weapon_mode==1) then
  23.         setblend(blend_alpha)
  24.         setalpha(1.0)
  25.         setcolor(255,255,255)
  26.         setscale(1,1)
  27.         setrotation(0)
  28.         drawimage(cc.raft.gfx_wpn,getplayerx(0),getwatery()-40)
  29.     end
  30. end
  31.  
  32. function cc.raft.attack(attack)                                        -- Attack
  33.     -- Use automatically
  34.     if (weapon_mode==0) then
  35.         useweapon(1)
  36.         weapon_mode=1
  37.     end
  38.     -- Keep player away from water
  39.     if (weapon_mode==1) then
  40.         if getplayery(0)>=getwatery()-55 then
  41.             playerposition(0,getplayerx(0),getwatery()-55)
  42.             if getplayeryspeed(0)>=0 then
  43.                 playerpush(0,0,0,1,0)
  44.             end
  45.             if keydown(key_jump)==1 then
  46.                 playerposition(0,getplayerx(0),getwatery()-60)
  47.                 playerpush(0,getplayerdirection(0)*3,-4,1,0)
  48.             elseif keydown(key_backjump)==1 then
  49.                 playerposition(0,getplayerx(0),getwatery()-60)
  50.                 playerpush(0,getplayerdirection(0)*-1,-5,1,0)
  51.             end
  52.         end
  53.         --Timeout (disable raft)
  54.         if getframesleft()<=1 then
  55.             weapon_mode=2
  56.         end
  57.     end
  58. end